import System.Environment   
import System.IO

write0::IO()
write0=do
       putStr "2\n0\nzero\n"
       hFlush stdout
       read0

read0::IO()
read0=do
     r<-getLine
     write1

read1::IO()
read1=do
     r<-getLine
     write0

write1::IO()
write1=do
       putStr "1\nsucc\n0\n"
       hFlush stdout
       read0 

main::IO()
main=do
     args <- getArgs
     if head(args) == "1"
        then read1
        else write0